home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 4 / 64er_Magazin_Sonderheft_04_86-04_1986_Markt__Technik_de_Disk_1_of_2_Side_A.d64 / listing 07.d (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  184b  |  8 lines
  1. 10 dim x$(2000)
  2. 20 x$(2000)="mike"
  3. 30 rem suchroutine
  4. 35 ti$="000000":rem stoppuhr auf null
  5. 40 fori=1to2000
  6. 50 :ifx$(i)="mike"thenprint"mike steht in satz";i:print"benoetigte zeit:";ti$
  7. 60 nexti
  8.